
* 



EXPRESS MAIL LABEL NO. EM472095216US 



PATENT APPLICATION 
Attorney Docket 
No. 8616. CIP5 



United States Patent Application 



Carl T. Wittwer, 
Kirk M. Ririe, 
Randy P. Rasmussen 
and 

David R. Hillyard 
for 



SYSTEM AND METHOD FOR CARRYING OUT 
AND MONITORING BIOLOGICAL PROCESSES 



PROGRAMMING CODE APPENDIX A 



1 GOTO 60: £21 scepp*r (l3$(0), Q=z{lZ) ) **« 

3 r? (^(55507) .A2<D.64)*0 THEN Z (0) -XT* (65506) : GOTO 3 

i DC : WiCLS (X3V (65=07) .AND. 123) =Ua 

5 1*0 : CO : 1=1-1 : X3Y(63506) *A3C($ (0) , I) 

5 2 ASC(S(Q) ,I)<>13 : R3TCSCT 

7 DC t WHUZ (X3Y( 65507) .AND, 64) =54 

3 1=0 : DO : 3 (I) =X3Y(65506) 

9 1=1-1 : UNTIL Z(I-1)»32 i HETOrll 

10 * ,w error ch^ck*" 
13 IT TX<0 THZH TX»0 

IS * SZTJaH 

. 20 IT TX<-3S1 TXs-251 
21 

25 I? TX>251 TKSN TX*2S1 

26 R3TJRN 

30 GCSwS 50 : T?!=T? : Tl=TTME 

32 CO : l^TTIL TIMEMn.r0 . 2 

34 GCSuB 50:TP2=rT? : T2-TTME |% 

36 SI^CTPl-TPD/Cn-TL) :E? SI/<>0 TEST r2>(TO-TP2) /Sti 

38 FRITC OSXNG(»ft.»*) , 'SL-* ,SL. TM' /IT, 'AT THHP»\T?2 

40 if rr>i goto 30 

42 RKICKH 

ig rhm ***ta»«ratura meaaur«cattt*** . 

50 E=Z3Y{ 65504) :P=X3Y(6550S) :<5=2Hr (S 3504) ^(^56+^300) /l 8. 3: SEECBH 

60 : STRING 150, 72 : DIM 2(72) 

72 DTIS1^35iDTIMp1:D3-L0 

74 ATS^60:AXrtf=l:AS*20 

AO ©<U^USIOT(H#),-^XM (20),'TS£?MAB (30) , "CTffi* ,TAB (40) , -SEX)1?E' 

" 82 1 1 ) ' DENATURATIGN* , TAB(20) / OTSMP,1M(30) ,ETIM,TAB(40) ,BS 

84 ^HHT «2) ANNEALING* , TAB (20) ,*r£M?,TAB(30) ,Ain2£,TAB (40) ,AS 

86 PRIOT "3) EXTENSION , TAB(2G) , E7TEM?,TAB(3Q) ,Em,TAB(40) ,ES 

aa pkj^t 1 *4) cycles • ,cycl2:PRJ^tc 

110 nr?CT »TYPS * TO CHANGE OR 0 IP OK (CHDICSS AR2 0,1,2,3, OR 4)?\J 

U4 17 J=0 THEN GOTO 170 

116 CN J GOSUB ,120,120,150,160 

118 PR~27T:GCT0 80 , r . . « a 

120 EWWT "ENTER DEIlATCRATICtJ Tamp, TiiM, Slopat ,Dra©,DnH.M 

US I? OT2MP>98 GOTO 120 

uo nwr -ansR ANNEauaw T««>, Ti=», Slopst • ,asssjp,atim,as 

140 r? AS-<0 GOTO 130 

142 I? AS>ai GOTO 130 

}S vSn'mSEL EXSSNSICK Tap. Ti=». Slops: ■ ,Er2ffi,EnM,BS:3ETaEN 

160 INPOT -ENTER NU=ber of Cyclas : * , CTOS:REIDHr 

170 $(0)-»«ari SOOjapl 300;h£l 2;rt2 1W « OCSCT 3 : GOS0B 7 

173 FC3. 1=0 TO 10 : PSIOT CHR(Z(IJ ) , : NEXT I : PHIOT 



200 



$(0)=*sol ndshfl 2;wfo -.x. . ;fli; :GCS0B 3j nm open. 



210 PSXNT 'WATS FOB. COOLING • sX3Y( 6=504)=3 

5*=^ ■SK-.T?; • WAD SAMPLES AMD TSSH SHESS A. KSJf' 
240 W-GST t IF W=0 GOTO 240 

300 TMC=0 :WS»0s CLGCC 0 , TIKE=0 : DWpiN It CMOC I 

JOS $(0)»'h£l l;«pl 100;gol;wfo •3e...;sl , 5<3CSDB 3i ROt cwsh 

S5 fSlWS»dK(«5SW) -4:1? V-l THEI TGaDTEMP* (DS/ 4) 



320 WS^(DS*lQ+WS*9)/10tTXarNT(W3+0.5) :GCSt3 15 

3-5 :C3r ( 55508) =TX:G0SU3 50: IF TP^TG GOTO 340 

330 I? TXoOS*10 GOTO 320 
333 30 

335 GCSU3 30:1? TP<TG GOTO 335 

340 TG=3TZM?:53=TI?S 

345 W3-(S*WS+10MTG-T?) 1/7 rTXsDTT (WS+0 .5) 

350 IT CO=0 THEN GCSU3 25 :X3Y (65208 ) a«:X3Y( 65509 ) =4 

355 IF rx<0 TEEN GGSU3 20 ::C3Y( 65508 ) *0:J3Y (65509) =4-TX 

360 IT 7=1 TKSf 17 D r n^>5>(TdS-23) GOTO 380 

370 IT lTTIM^TIME-ZB) GOTO 500 

380 GC5U3 50 : GCTC 345 

500 rr-TiTT W , :X5Y( 65308) =0:TO=AT3i3 

845 S(0)**spl 200; gel cd;h£l 2;wfo ».x. . ral* tGOSCB 3: rem opea 

355 X2Y{ 555G9) =AS*1Q 

860 GCSUB 30 

890 23»i3H:WS=-AS*10 

913 WS* ( 4«WSt20* (TO-T?) ) /5:TX*INT(WS+0.5} 

915 IT TX>=*0 THEN G0SU3 25 :XBY( 65508) =TX:X3Y(65E09) =4 

918 U TX<0 THEN GCSU3 20 :XBY ( 65508 ) >0 :X3Y( 65509 ) =4-T£ 

920 r? AK3M< (TIME-O ) GOTO 925 

924 GCSTJ3 50 : GOTO 913 

925 IT: PRINT «S • , :X3Y( 65509 ) »4 jTG*ST3!P*1 

930 $(C)**hei l;spl S0;gol;vr£o • • ;sl € :GOSOB 3:WS»0j REK (XOSS 

935 WS^ ( SS- 10-rW3* 9 ) / 1C : TX* HIT (WS+0 . 5 ) :GCSCB 15:G0SC3 25 (65308 ) «TS 

937 GCSUB 50:1? T?>TG-1 GOTO 970 

940 IT TX<>H3»10 GOTO 935 

950 GCSUB 50 : I? T?<TG-1 GOTO 950 

970 H3=TTHS 

980 WSs{WS+5'(TG-TO))/a :T2MKr(WS+0 .5) , 

983 rr TX>=»0 THEN GOSU3 23:X2X (65509 ) «T3C:I3Tf( 65509) -4 

987 I? TS<0 THEN GOSuS 20 :ABY( 65508 ) =0 :XB*( 65509 ) «4-T2 

990 "rr rriK<(TIHE-EB) GOTO 1000 

995 GCSUB 50 : GOTO 980 

1000 OTI^TEiS-TMC : TVC^TTM^ : PRXSTT ■CS02»",V, -< E2ffi« - ,0111 

1Q50 NE2CT V 

1055 X3V ( 65508) -0 : XBY ( 63509 ) =255 

1060 EOT * STRAND (V/N) ?\${1) 

1070 Z7 ASC($(1),1)»73 GOTO 1290 

1100 rR-rrr 'strand keannealimg in phccsss.,.' 

1110 T^=CTmP:XBY(655Q9)*4 

1120 WS^(DSHQ^3*9)/10:TX=irNT(WS+0.5) ;C0SUB 15 

1130 X3Y< 65508) «TX:GOS£S 50:IF TT^TG GOTO 1170 

U40 I? KoCS*10 GOTO 1120 

U50 GCSUB 30 

1160 GCSU3 50: IF TP<TO GOTO 1160 

1170 SE»*nHE 

1180 MS- <H*WS+10» (TG-T?))/12 :TX*IHT(W3+0.5) 

1185 17 TX»0 THEN GOSua 25:XBY(65508}=TX:2BY(65509)*4 

1190 IS H^<0 THEN GOSC3 20 :3BY ( 65508 ) «0 :XH?(65509 ) *4-TX 

U93 TJ 5< (TIME-33) GOTO 1200 

U96 GCSUB 50 : GOTO 1130 

1200 X3Y ( 65508) *0:XSY( 65509) -255 iWS^O 

1310 DO: GCSUB 50: UNTIL T?<75 

1220 S3»TIME 

1250 I? THEN GOSU3 20:23^(65508) »0:XHY (65509 ) 

U60 IT 6Q<(TIME-2a) GOTO 1280 
1270 GCSUB 50 : GOTO 1230 



1280 X3Y ( 65508 } =0 xXSTC { $5509 ) *355 

1230 rMFCT 'ANOTHER (Y/N) ?*,${1> 

1300 r? Asc($(i),i)»7a goto 2000 

1400 KOCOT:$(0)a - 5oI nd;h£l 9;w£o = .;al'iG0SU3 3tGCTO 

2000 $(0)a»sol nd/hzl 9/wfo -.X- . ;sl* :GCS3 3;END 



